-- Versions XObject, version 1.1, 8/9/96
Versions
-- Copyright © 1996 Glenn M. Picher, Dirigo Multimedia
-- Email: gpicher@maine.com
-- Web: http://www.maine.com/shops/gpicher
-- Phone: (207)767-8015 (South Portland, Maine, USA)
-- 
-- Distributors: g/matter, inc.
-- Email: support@gmatter.com
-- Web: http://www.gmatter.com
-- Phone: (415)243-0394 (San Francisco, California USA)
-- 
-- License granted to use and redistribute for any purpose,
-- as long as copyright and contact information remains intact.
-- Each instance of the XObject will present a copyright alert
-- box once if you use any methods other than the QuickTime version
-- checking functions. The registered version does not present any
-- alert boxes.
-- 
I mNew           -- Standard creation method
X mDispose       -- Standard dispose method
S mQuickTimeVersion
--  Get string of QuickTime version ('000000.000000.000000.000000' if QTW
--  is not installed). Suitable for string comparisons (<, =, >). Example:
--  Your title includes the QTW v2.1.1.57 installer, and you're running on
--  a machine with QTW v2.0.1.41 already installed.  QTW v. 2.1.1.57 becomes
--  '000002.000001.000001.000057' . Alphabetically, this comes after QTW
--  v. 2.0.1.41 ('000002.000000.000001.000041'). Thus you can conclude
--  that QuickTime needs to be updated to the version supplied with your
--  title. This is a workaround for a bug in MCI 'info qtwvideo version'
--  reporting, which does not always produce valid numeric comparisons. Only
--  reports the 16-bit QuickTime version. Works by initializing QuickTime,
--  so the first use may take much longer than subsequent uses.
--  Number is formatted to be compatible with file version numbers.
--  Note: requires ASK16.EXE and VERS16.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if ASK16.EXE can't load; Returns string with word 1 'Error:'
--  if ASK16.EXE fails. ***Note: version 1.0 of this XObject did not use
--  ASK16.EXE and VERS16.DLL . To avoid occasional crashes when 16-bit Director
--  got confused about the state of QuickTime, this new version keeps
--  Director's QuickTime code isolated from this XObject's QuickTime
--  code. Be sure to add ASK16.EXE and VERS16.DLL to your
--  distributed projects when upgrading to this version of this XObject.
S mWin32QuickTimeVersion
--  Reports the 32-bit QuickTime version. Requires ASK32.EXE and VERS32.DLL
--  in the same directory as this XObject .DLL . These files are
--  distributed with this XObject .DLL file. Returns EMPTY if 32-bit
--  environment is unavailable, or ASK32.EXE can't load; Returns
--  string with word 1 'Error:' if ASK32.EXE fails.
SS mFileVersion, fileName
--  Get string of file version number. Allows checking versions of
--  QuickTime compressor files, even 32-bit versions. Suitable for string
--  comparisons. Example: QTIM32.DLL in the System folder, v. 2.1.1.57 becomes 
--  '000002.000001.000001.000057' . The extra digits are the minimum required to
--  represent the maximum 64-bit version number. Can be used with any file that
--  contains a version resource, not just QuickTime files. If file is missing
--  or does not contain version info, result is '000000.000000.000000.000000' .
--  Works whether 32-bit environment is available or not; however,
--  ASK32.EXE and VERS32.DLL are required in the same directory as this
--  XObject .DLL to get Win32 version numbers under Windows NT or 95. These
--  files are distributed with this XObject .DLL file. Further note: Windows
--  NT uses a different system directory for 32-bit .DLLs. See below.
S mWindowsDirectory
--  Returns full path to Windows directory (including trailing '\').
--  Useful for building full path names for use with mFileVersion.
--  Word 1 of the returned string will be 'Error:' in the unlikely
--  event of an error, followed by a description of the error.
--  Note: returns the Win16 answer (see below).
S mWin32WindowsDirectory
--  Returns full path to Windows directory (including trailing '\').
--  Should be the same answer as mWindowsDirectory for all current
--  Windows versions, but this may change in future Win versions.
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
S mSystemDirectory
--  Returns full path to System directory (including trailing '\').
--  Useful for building full path names for use with mFileVersion.
--  Word 1 of the returned string will be 'Error:' in the unlikely
--  event of an error, followed by a description of the error.
--  Note: returns the Win16 answer (see below).
S mWin32SystemDirectory
--  Returns full path to System directory (including trailing '\').
--  Under Windows NT, this is a different answer than mSystemDirectory.
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
S mDOSVersion
--  Returns the DOS version reported to 16-bit apps. No Win32 equivalent.
S mWindowsVersion
--  Returns the Windows version reported to 16-bit apps. This is
--  not the same answer as mWin32Version under Windows 95.
S mWin32Version
--  Returns the Win32 version (a different answer than mWindowsVersion)
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
--  Note the lack of ability to check for Win32-specific DOS version.
S mWin32Platform
--  Returns the Win32 platform ('Win32s on Windows 3.1',
--  'Win32 on Windows 95', or 'Windows NT').
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
S mWin32Build
--  Returns the Win32 build. This is useful because Director requires
--  at least Windows NT v3.51 with Service Pack 4 applied (build 1057).
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
S mWinNTVersion
--  Tells you what verison of Windows NT you're running under-- 'Workstation',
--  'Server', 'Advanced Server', 'Unknown', or 'Error' is there's a problem. 
--  Note: requires ASK32.EXE and VERS32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
SS mGetShortFileName, theFile
--  Returns the MS-DOS style filename of a Windows 95 or Windows NT long
--  file name which might contain spaces or other DOS-illegal characters. 
--  This method can also accept file names that are already DOS-legal. 
--  This method is helpful when an XObject only works with DOS filenames.
--  Note: requires ASK32.EXE and FNAME32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
SS mGetLongFileName, theFile
--  Returns the Windows 95 or Windows NT long file name, which might contain
--  spaces or other DOS-illegal characters, given a DOS short file name. 
--  This method can also accept file names that are already long.
--  Note: requires ASK32.EXE and FNAME32.DLL in the same directory as this
--  XObject .DLL (these files are distributed with this XObject).
--  Returns EMPTY if 32-bit environment is unavailable, or ASK32.EXE
--  can't load; Returns string with word 1 'Error:' if ASK32.EXE fails.
--